﻿Imports IETracker.Business.Entities
Imports IETracker.UI.Process
Imports System.Collections.ObjectModel



Public Class Form1
    Private _upc As SubmitterProcess = Nothing



    Private Sub Form1_Load(sender As Object, e As System.EventArgs) Handles Me.Load


        _upc = New SubmitterProcess


        Dim x As New List(Of TransactionList)
        x = _upc.GetExpenseList(DateTime.Now.AddDays(-14), 20)

        Dim uu As String = ""


        Dim trans As New TransactionList

        trans.TransactionDescription = "try"
        trans.TransactionDate = DateTime.Now.ToString
        '"04/07/2011 20:54:31"
        trans.TransactionAmount = Convert.ToDecimal("1")
        trans.TransactionComment = "test"
        trans.TransactionTypeDesc = "expense"
        trans.TransactionID = 48

        _upc.CreateTransaction(trans)
        


    End Sub
End Class
